home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 January: Mac OS SDK / Dev.CD Jan 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Patches.a < prev    next >
Encoding:
Text File  |  1997-08-12  |  3.7 KB  |  148 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Patches.a
  3. ;
  4. ;    Contains:    Patch Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 8
  7. ;                Release:    Universal Interfaces 3.0.1
  8. ;
  9. ;    Copyright:    © 1994-1997 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.  
  19.     IF &TYPE('__PATCHES__') = 'UNDEFINED' THEN
  20. __PATCHES__ SET 1
  21.  
  22.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  23.     include 'Types.a'
  24.     ENDIF
  25.  
  26.     IF TARGET_OS_MAC THEN
  27.  
  28. kOSTrapType                        EQU        0
  29. kToolboxTrapType                EQU        1
  30. ; typedef SignedByte                     TrapType
  31.  
  32.  
  33. OSTrap                            EQU        0                    ; old name 
  34. ToolTrap                        EQU        1                    ; old name 
  35. ; 
  36. ;    GetTrapAddress and SetTrapAddress are obsolete and should not
  37. ;    be used. Always use NGetTrapAddress and NSetTrapAddress instead.
  38. ;    The old routines will not be supported for PowerPC apps.
  39. ;
  40.  
  41.     IF ¬ TARGET_RT_MAC_CFM THEN
  42. ;
  43. ; pascal UniversalProcPtr GetTrapAddress(UInt16 trapNum)
  44. ;
  45.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  46.         _GetTrapAddress:    OPWORD    $A146
  47.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  48.         IMPORT_CFM_FUNCTION GetTrapAddress
  49.     ENDIF
  50.  
  51. ;
  52. ; pascal void SetTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  53. ;
  54.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  55.         _SetTrapAddress:    OPWORD    $A047
  56.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  57.         IMPORT_CFM_FUNCTION SetTrapAddress
  58.     ENDIF
  59.  
  60.     ENDIF
  61. ;
  62. ; pascal UniversalProcPtr GetOSTrapAddress(UInt16 trapNum)
  63. ;
  64.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  65.         ; parameters:
  66.         ;    trapNum         => D0
  67.         ; returns:
  68.         ;    UniversalProcPtr <= A0
  69.         _GetOSTrapAddress:    OPWORD    $A346
  70.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  71.         IMPORT_CFM_FUNCTION GetOSTrapAddress
  72.     ENDIF
  73.  
  74. ;
  75. ; pascal void SetOSTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  76. ;
  77.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  78.         ; parameters:
  79.         ;    trapAddr        => A0
  80.         ;    trapNum         => D0
  81.         _SetOSTrapAddress:    OPWORD    $A247
  82.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  83.         IMPORT_CFM_FUNCTION SetOSTrapAddress
  84.     ENDIF
  85.  
  86. ;
  87. ; pascal UniversalProcPtr GetToolTrapAddress(UInt16 trapNum)
  88. ;
  89.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  90.         ; parameters:
  91.         ;    trapNum         => D0
  92.         ; returns:
  93.         ;    UniversalProcPtr <= A0
  94.         _GetToolTrapAddress:    OPWORD    $A746
  95.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  96.         IMPORT_CFM_FUNCTION GetToolTrapAddress
  97.     ENDIF
  98.  
  99. ;
  100. ; pascal void SetToolTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  101. ;
  102.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  103.         ; parameters:
  104.         ;    trapAddr        => A0
  105.         ;    trapNum         => D0
  106.         _SetToolTrapAddress:    OPWORD    $A647
  107.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  108.         IMPORT_CFM_FUNCTION SetToolTrapAddress
  109.     ENDIF
  110.  
  111. ;
  112. ; pascal UniversalProcPtr GetToolboxTrapAddress(UInt16 trapNum)
  113. ;
  114.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  115.         ; parameters:
  116.         ;    trapNum         => D0
  117.         ; returns:
  118.         ;    UniversalProcPtr <= A0
  119.         _GetToolboxTrapAddress:    OPWORD    $A746
  120.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  121.         IMPORT_CFM_FUNCTION GetToolboxTrapAddress
  122.     ENDIF
  123.  
  124. ;
  125. ; pascal void SetToolboxTrapAddress(UniversalProcPtr trapAddr, UInt16 trapNum)
  126. ;
  127.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  128.         ; parameters:
  129.         ;    trapAddr        => A0
  130.         ;    trapNum         => D0
  131.         _SetToolboxTrapAddress:    OPWORD    $A647
  132.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  133.         IMPORT_CFM_FUNCTION SetToolboxTrapAddress
  134.     ENDIF
  135.  
  136.     IF TARGET_CPU_PPC THEN
  137. ;
  138. ; pascal UniversalProcHandle GetTrapVector(UInt16 trapNumber)
  139. ;
  140.     IF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  141.         IMPORT_CFM_FUNCTION GetTrapVector
  142.     ENDIF
  143.  
  144.     ENDIF    ; TARGET_CPU_PPC
  145.     ENDIF    ; TARGET_OS_MAC
  146.     ENDIF ; __PATCHES__ 
  147.  
  148.